Top 10k strings from Music Writer (1986)(R.D. Foord Software)(48-128k).tzx
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
4 ;"Enter Channel No.": 4 "; 2 y$=y$+("#" 2 x$=x$+y$(e): 2 p 2 oct) + ("N" + 2 n$="&")+(n$ 2 low=a-high*256 2 lenght=(a+2 2 lenght+("$" 2 lenght)+("#" 2 lenght +("#" 2 lenght +"_": 2 le=lenght: 2 lch=ch)+(c$+y$ 2 lch=ch)+(b$+y$ 2 lch=ch)+(a$+y$ 2 lastb3=lenght 2 lastb2=lenght 2 lastb1=lenght 2 last=lenght: 2 j)+x$+y$(e+1 2 c$=c$+"!"+y$+"!": 2 c$="")+(c$+x$ 2 beate=beate-time 2 beate=beate+(4 2 beate >time 2 beat3=time+beat3: 2 beat3=beat3-time 2 beat3=beat3-(.25 2 beat3=beat3+(4 2 beat3 >time 2 beat2=time+beat2: 2 beat2=beat2-time 2 beat2=beat2-(.25 2 beat2=beat2+(4 2 beat2 >time 2 beat1=time+beat1: 2 beat1=beat1-time 2 beat1=beat1-(.25 2 beat1=beat1+(4 2 beat1 >time 2 bare=bare+1 2 bar3=bar3-1 2 bar3=bar3+1 2 bar2=bar2-1 2 bar2=bar2+1 2 bar1=bar1-1 2 bar1=bar1+1 2 b$=b$+"!"+y$+"!": 2 b$="")+(b$+x$ 2 a$=a$+"!"+y$+"!": 2 a$="")+(a$+x$ 2 a$+"H",b$,c$ 2 M writer 2 ;beat3;" ": 2 ;beat2;" "; 2 ;beat1;" "; 2 ;"TRIPLET": 2 ;"Repeat Marker [erase] "; 2 ;"Press ~t~ to enter" 2 ;"Press ~e~ to change/~q~ to quit" 2 ;"LOADING SCREEN" 2 ;"Enter beats to the bar-";time 2 ;"Code=";y$(u+1 2 ;"Ch3.";bar3; 2 ;"Ch2.";bar2; 2 ;"Ch1.";bar1; 2 ;"Bar-";bare; 2 ;"BAR/BEAT" 2 ;" y/n :"; 2 ;" Quit "; 2 ;" ": 2 ;" " 2 ;" " 2 ; ((lastb1 2 88G88G88G88G88G88G88G88G88G888888888888888888888888888888888xxx88888888888888888888888888888xxx88888888888888888888888888888xxx88888888888888888888888888888xxx888888888x888888xx888888x88888888888888888888888888888888888888888hhhh88888888888888888xxxxxxxxxx8xxxxxx888888888888888xxxxxxxxxx8xxxxxx888888888888888xxxxxxxxxx8xxxxxx888888888888888xxxxxxxxxx8iiiiii888888888888888xxxxxxxxxx8iiiiii888888888888888xxxxxxxxxx8888888888888888888888xxxxxxxxxx 2 2222222222222222222222222222 2 ));"-";(y$);" alter beat "; 2 )))))))))))))))))))))))))))) 2 "l")+(c$(lrec 2 "l")+(b$(lreb 2 "l")+(a$(lrea 2 "enter message:-";y$ 2 "O6N10ced": 2 "O5N10agf","O5N10fdc": 2 "M writer" 2 "Enter-(1-8)Microdrive/0-Tape"; 2 "Enter ~L~ for last marker-"; 2 "Enter new code-";x$ 2 "Enter file name:-"; 2 "Enter file name-"; 2 " PRESS (1 to 8)or 0 for tape. "; 2 ": 2 " 1 m writer 1 Created with Ramsoft MakeTZX 1 "m writer"